home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / T-TPUG Old Monthly Disks / (c)tj.d64 / pool loader.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  253b  |  6 lines
  1. 1 FORJ=1TO33:READT:POKE545+J,T:NEXT:POKE253,5:S=2326
  2. 2 POKES-1,50:POKES-2,76:POKES-3,79:POKES-4,79:POKES-5,80
  3. 3 SYS546:POKE252,67:POKE251,248:SYS569:SYS24055
  4. 4 DATA169,1,162,8,160,0,32,186,255,165,253,166,49,164,50,32,189,255
  5. 5 DATA169,128,133,157,96,169,0,166,251,164,252,32,213,255,96
  6.